home *** CD-ROM | disk | FTP | other *** search
/ Aminet 25 / Aminet 25 (1998)(GTI - Schatztruhe)[!][Jun 1998].iso / Aminet / util / arc / mpackWOS.lha / mpackppc / src / string.c < prev    next >
C/C++ Source or Header  |  1998-04-22  |  3KB  |  80 lines
  1. /*
  2.  * String manipulation routines
  3.  */
  4. /* (C) Copyright 1993,1994 by Carnegie Mellon University
  5.  * All Rights Reserved.
  6.  *
  7.  * Permission to use, copy, modify, distribute, and sell this software
  8.  * and its documentation for any purpose is hereby granted without
  9.  * fee, provided that the above copyright notice appear in all copies
  10.  * and that both that copyright notice and this permission notice
  11.  * appear in supporting documentation, and that the name of Carnegie
  12.  * Mellon University not be used in advertising or publicity
  13.  * pertaining to distribution of the software without specific,
  14.  * written prior permission.  Carnegie Mellon University makes no
  15.  * representations about the suitability of this software for any
  16.  * purpose.  It is provided "as is" without express or implied
  17.  * warranty.
  18.  *
  19.  * CARNEGIE MELLON UNIVERSITY DISCLAIMS ALL WARRANTIES WITH REGARD TO
  20.  * THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
  21.  * AND FITNESS, IN NO EVENT SHALL CARNEGIE MELLON UNIVERSITY BE LIABLE
  22.  * FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  23.  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN
  24.  * AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
  25.  * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
  26.  * SOFTWARE.
  27.  */
  28.  
  29. #include <ctype.h>
  30.  
  31. static unsigned char upcase[256] = {
  32.     0,  1,  2,  3,  4,  5,  6,  7,  8,  9, 10, 11, 12, 13, 14, 15,
  33.    16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31,
  34.   ' ','!','"','#','$','%','&', 39,'(',')','*','+',',','-','.','/',
  35.   '0','1','2','3','4','5','6','7','8','9',':',';','<','=','>','?',
  36.   '@','A','B','C','D','E','F','G','H','I','J','K','L','M','N','O',
  37.   'P','Q','R','S','T','U','V','W','X','Y','Z','[', 92,']','^','_',
  38.   '`','A','B','C','D','E','F','G','H','I','J','K','L','M','N','O',
  39.   'P','Q','R','S','T','U','V','W','X','Y','Z','{','|','}','~',127,
  40.   128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,
  41.   144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159,
  42.   160,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175,
  43.   176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191,
  44.   192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207,
  45.   208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223,
  46.   224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239,
  47.   240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255};
  48.  
  49. #define UPC(x) (upcase[(unsigned char)(x)])
  50.  
  51. /*
  52.  * Same as strcmp, but case-insensitive.
  53.  */
  54. int
  55. cistrcmp(register char *s1,register char *s2)
  56. {
  57.     register char c1;
  58.     while ((c1 = *s1) && UPC(c1) == UPC(*s2)) {
  59.         s1++;
  60.         s2++;
  61.     }
  62.     return UPC(c1) - UPC(*s2);
  63. }
  64.  
  65. /*
  66.  * Same as strncmp, but case-insensitive.
  67.  */
  68. int
  69. cistrncmp(register char *s1,register char *s2,int n)
  70. {
  71.     register char c1;
  72.     while (n-- && (c1 = *s1) && UPC(c1) == UPC(*s2)) {
  73.         s1++;
  74.         s2++;
  75.     }
  76.     if (n == -1) return 0;
  77.     return UPC(c1) - UPC(*s2);
  78. }
  79.  
  80.